Script: --on mouseUp wdID,wdName,objNo,objName,objValue┬get wsGet(wdID,"list","SelectionText")┬if (it¡empty) and (there is a cd (item 1 of it)) then┬ visual iris open fast┬ go cd (item 1 of it)┬ put ((item 1 of the screenRect)+3&",40") into TL┬ -- wsSet wdID,"0","Height","1"┬ wsSet wdID,"0","TopLeft",TL┬else┬ wsSet wdID,"list","Selection", "" -- remove selection highlight┬end if┬┬--end mouseUp